home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 1 / BBS in a box - Trilogy I.iso / Files / Music / M / M5Mac ƒ / Scripts folder / JCR150.PAR < prev    next >
Encoding:
Text File  |  1992-12-09  |  2.4 KB  |  70 lines  |  [TEXT/M5Mc]
  1. COM ------------JCR150------------------------;
  2. COM SERIE SUR DISTORSION NON-LINEAIRE;
  3. COM p9 index max doit etre <1;
  4. COM ------------------------------------------;
  5. SAM 10000;
  6. INS 0 1;
  7. CNV P6=HTZ(P6);
  8. CNV P7=DUR(P7);
  9. CNV P8=DUR(P8);
  10. CNV P9=P9/256;
  11. IOS P9 P7 B3 F5 P10;
  12. IOS P6 P8 B4 F7 P11;
  13. IOS B3 B4 B3 F1 P30;
  14. DNL P5 B3 B3 F2;
  15. OUT B3;
  16. END;
  17. COM -----------------------------------------;
  18. GEN 0 2 1 512 1 1;
  19. GEN 0 1 2 512 -.99 0 -.5 200 .5 312 .99 512;
  20. COM -----------------------------------------;
  21. INS 0 2;
  22. CNV P6=HTZ(P6);
  23. CNV P7=DUR(P7);
  24. CNV P8=DUR(P8);
  25. IOS P5 P7 B3 F6 P10;
  26. IOS P6 P8 B4 F8 P11;
  27. IOS B3 B4 B3 F3 P30;
  28. OUT B3 B1;END;
  29. COM -----------------------------------------;
  30. GEN 0 7 3 512 0;
  31. COM FONCTION DE RYTHME PUIS DE PITCH;
  32. GEN 0 1 5 512 0 0 .99 4 .6 10 0 29 0 58 .7 62 .3 72 0 78 0 97 .4 102
  33.  .1 110 0 118 0 147 .9 149 .6 153 .2 156 .8 158 .3 180 0 196 0 209
  34.  .3 211 .7 225 .3 230 0 233 0 248 .4 250 .9 255 0 262 0 275 .99 276
  35.  0 314 0 334 .8 335 .2 345 0 353 0 373 .99 375 0 393 0 422 .6 423 .1 432
  36.  .7 433 .7 440 0 452 0 512;
  37. GEN 0 1 6 512 0 0 .9 3 .6 50 .2 56 0 58 0 84 .8 86 .9 107 0 114 0 151 .99 155
  38.  .3 167 0 171 0 211 .99 213 .3 224 .1 227 .99 231 .6 150 .8 280 .05 284 .5 286
  39.  .4 290 .05 292 .6 300 .8 306 0 312 0 381 .6 383 0 397 0 410 .7 415 .2 425
  40.  0 440 0 492 .99 496 .6 504 0 512;
  41. GEN 0 1 7 512 .593 0 .593 42 .99 43 .99 85 .37 86 .37 127 .527 128 .527 170
  42.  .667 171  .667 212
  43.  .351 213 .351 255 .790 256 .790 298 .555 299 .555 340 .468 341 .468 383
  44.  .624 384 .624 425 .832 426 .832 468 .889 469 .889 512 ;
  45. GEN 0 1 8 512 .375 0 .375 42 .200 43 .200 85 .999 86 .999 127 .333 128 .333 170
  46.  .158 171 .158 212 .422 213 .422 255 .601 256 .601 298 .141 299 .141 340
  47.  .237 341 .237 383 .534 384 .534 425 .450 426 .450 468 .712 469 .712 512;
  48. COM --------------------------------------------------------------------------;
  49. INS 0 3;
  50. CNV P6=HTZ(P6);
  51. CNV P7=DUR(P7);
  52. CNV P8=DUR(P8);
  53. OSC P5 P7 B3 F4 P30;
  54. IOS P6 P8 B4 F7 P29;
  55. OSC B3 B4 B3 F1 P28;
  56. OUT B3;
  57. END;
  58. COM -----------------------------------------;
  59. GEN 0 7 4 512 -9;
  60. NOT 1 1 11.82 2500 1640 11.82 10.90 250;
  61. NOT 24.62 1 23.64 2000 1640 -11.82 -10.90 250;
  62. NOT 36.44 1 11.82 2500 2304 11.82 10.90 250;
  63. NOT 3.72 2 16.32 8000 228 8.16 10.90;
  64. NOT 6.45 1 29.6 4500 820 5.91 -5.45 220;
  65. NOT 6.45 1 29.6 4000 576 2.955 -5.45 200;
  66. NOT 24 2 16.32 3000 455 -16.32 -10.90;
  67. NOT 24 1 23.64 4000 820 -11.82 10.90 250;
  68. NOT 30 2 16.32 8000 228 8.16 10.90;
  69. NOT 30 3 22 5000 6560 .92 11;
  70. TER 54;